
// A2_Merge
//==============================================================================

// Description: This code creates a summary file which summarizes all product
// categories that are used, including those that combine several others

clear
cd "D:\data_replication"

use estimation\2_product_list\output\A1_pc_france.dta, clear
append using estimation\2_product_list\output\A3_pc_netherlands.dta
append using estimation\2_product_list\output\A4_pc_germany.dta
append using estimation\2_product_list\output\A5_pc_italy.dta
append using estimation\2_product_list\output\A6_pc_uk.dta
append using estimation\2_product_list\output\A7_pc_ireland.dta
append using estimation\2_product_list\output\A8_pc_denmark.dta
append using estimation\2_product_list\output\A9_pc_greece.dta
append using estimation\2_product_list\output\A10_pc_portugal.dta
append using estimation\2_product_list\output\A11_pc_spain.dta
append using estimation\2_product_list\output\A17_pc_belgium.dta
append using estimation\2_product_list\output\A18_pc_luxembourg.dta
append using estimation\2_product_list\output\A30_pc_sweden.dta
append using estimation\2_product_list\output\A32_pc_finland.dta
append using estimation\2_product_list\output\A38_pc_austria.dta
append using estimation\2_product_list\output\A46_pc_malta.dta
append using estimation\2_product_list\output\A53_pc_estonia.dta
append using estimation\2_product_list\output\A54_pc_latvia.dta
append using estimation\2_product_list\output\A55_pc_lithuania.dta
append using estimation\2_product_list\output\A60_pc_poland.dta
append using estimation\2_product_list\output\A61_pc_czech_republic.dta
append using estimation\2_product_list\output\A63_pc_slovakia.dta
append using estimation\2_product_list\output\A64_pc_hungary.dta
append using estimation\2_product_list\output\A66_pc_romania.dta
append using estimation\2_product_list\output\A68_pc_bulgaria.dta
append using estimation\2_product_list\output\A91_pc_slovenia.dta
append using estimation\2_product_list\output\A600_pc_cyprus.dta
sort pc
by pc: keep if _n == 1
egen product_id = group(pc)
save estimation\2_product_list\output\pc_unique.dta, replace



use estimation\2_product_list\output\A1_pc_comp_france.dta, clear
gen cty = 1
append using estimation\2_product_list\output\A3_pc_comp_netherlands.dta
replace cty = 3 if cty == .
append using estimation\2_product_list\output\A4_pc_comp_germany.dta
replace cty = 4 if cty == .
append using estimation\2_product_list\output\A5_pc_comp_italy.dta
replace cty = 5 if cty == .
append using estimation\2_product_list\output\A6_pc_comp_uk.dta
replace cty = 6 if cty == .
append using estimation\2_product_list\output\A7_pc_comp_ireland.dta
replace cty = 7 if cty == .
append using estimation\2_product_list\output\A8_pc_comp_denmark.dta
replace cty = 8 if cty == .
append using estimation\2_product_list\output\A9_pc_comp_greece.dta
replace cty = 9 if cty == .
append using estimation\2_product_list\output\A10_pc_comp_portugal.dta
replace cty = 10 if cty == .
append using estimation\2_product_list\output\A11_pc_comp_spain.dta
replace cty = 11 if cty == .
append using estimation\2_product_list\output\A17_pc_comp_belgium.dta
replace cty = 17 if cty == .
append using estimation\2_product_list\output\A18_pc_comp_luxembourg.dta
replace cty = 18 if cty == .
append using estimation\2_product_list\output\A30_pc_comp_sweden.dta
replace cty = 30 if cty == .
append using estimation\2_product_list\output\A32_pc_comp_finland.dta
replace cty = 32 if cty == .
append using estimation\2_product_list\output\A38_pc_comp_austria.dta
replace cty = 38 if cty == .
append using estimation\2_product_list\output\A46_pc_comp_malta.dta
replace cty = 46 if cty == .
append using estimation\2_product_list\output\A53_pc_comp_estonia.dta
replace cty = 53 if cty == .
append using estimation\2_product_list\output\A54_pc_comp_latvia.dta
replace cty = 54 if cty == .
append using estimation\2_product_list\output\A55_pc_comp_lithuania.dta
replace cty = 55 if cty == .
append using estimation\2_product_list\output\A60_pc_comp_poland.dta
replace cty = 60 if cty == .
append using estimation\2_product_list\output\A61_pc_comp_czech_republic.dta
replace cty = 61 if cty == .
append using estimation\2_product_list\output\A63_pc_comp_slovakia.dta
replace cty = 63 if cty == .
append using estimation\2_product_list\output\A64_pc_comp_hungary.dta
replace cty = 64 if cty == .
append using estimation\2_product_list\output\A66_pc_comp_romania.dta
replace cty = 66 if cty == .
append using estimation\2_product_list\output\A68_pc_comp_bulgaria.dta
replace cty = 68 if cty == .
append using estimation\2_product_list\output\A91_pc_comp_slovenia.dta
replace cty = 91 if cty == .
append using estimation\2_product_list\output\A600_pc_comp_cyprus.dta
replace cty = 600 if cty == .

sort pc cty
egen product_id_comp = group(pc cty)
save estimation\2_product_list\output\pc_comp_unique.dta, replace


use estimation\2_product_list\output\pc_unique.dta, clear
append using estimation\2_product_list\output\pc_comp_unique.dta

egen product_id_max = max(product_id)
replace product_id = product_id_comp + product_id_max if product_id == .

keep pc product_id pc8plus cty

save estimation\2_product_list\output\product_id_all.dta, replace
keep if cty == .
keep pc product_id
save estimation\2_product_list\output\product_id_non_comp.dta, replace

use estimation\2_product_list\output\product_id_all.dta, clear
keep if cty != .
save estimation\2_product_list\output\product_id_comp.dta, replace

